(create_pty): Fix last change.

diff --git a/src/process.c b/src/process.c
index 15ed971b3e28d720f9615eefc260de0e4e1dec98..56a8d189f9971f7da77c6993fda0500c61109c56 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -2355,7 +2355,12 @@ create_pty (process)
     max_process_desc = inchannel;
 
   XPROCESS (process)->pid = -2;
-  XPROCESS (process)->tty_name = build_string (pty_name);
+#ifdef HAVE_PTYS
+  if (pty_flag)
+    XPROCESS (process)->tty_name = build_string (pty_name);
+  else
+#endif
+    XPROCESS (process)->tty_name = Qnil;
 }
 
 \f